home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / 94xx / 9410a.d64 / zehnerblock 64 (.txt) < prev   
Commodore BASIC  |  1995-03-30  |  1KB  |  46 lines

  1. 10 AN=828:REM ANFANGSADRESSE
  2. 20 FORI=0TO188:READB:POKEAN+I,B:NEXTI
  3. 30 POKEAN+157,PEEK(788):POKEAN+158,PEEK(789):REM NORMALER IRQ
  4. 40 HI=INT((AN+165)/256):LO=(AN+165)-256*HI
  5. 50 POKEAN+147,LO:POKEAN+148,HI:REM ANFANG ASCII TABELLE
  6. 60 POKE56334,PEEK(56334)AND254:REM IRQ AUS
  7. 70 HI=INT(AN/256):LO=AN-256*HI
  8. 80 POKE788,LO:POKE789,HI:REM NEUER IRQ
  9. 90 POKE56334,PEEK(56334)OR1:REM IRQ WIEDER AN
  10. 100 END
  11. 110 DATA120,165,198,201,10,240,27,169,255,141,0,220,173,47,208
  12. 120 DATA41,248,141,47,208,172,1,220,9,7,141,47,208,192,255
  13. 130 DATA240,127,208,2,240,120,160,0,173,47,208,41,254,141,47
  14. 140 DATA208,174,1,220,9,7,141,47,208,138,201,255,208,46,160
  15. 150 DATA8,173,47,208,41,253,141,47,208,174,1,220,9,7,141
  16. 160 DATA47,208,138,201,255,208,23,160,16,173,47,208,41,251,141
  17. 170 DATA47,208,174,1,220,9,7,141,47,208,138,201,255,240,54
  18. 180 DATA201,254,240,31,200,201,253,240,26,200,201,251,240,21,200
  19. 190 DATA201,247,240,16,200,201,239,240,11,200,201,223,240,6,200
  20. 200 DATA201,191,240,1,200,196,2,240,12,132,2,185,225,3,164
  21. 210 DATA198,153,119,2,230,198,76,49,234,169,255,133,2,208,247
  22. 220 DATA 022:REM HELP
  23. 230 DATA 056:REM 8
  24. 240 DATA 053:REM 5
  25. 250 DATA 023:REM TAB
  26. 260 DATA 050:REM 2
  27. 270 DATA 052:REM 4
  28. 280 DATA 055:REM 7
  29. 290 DATA 049:REM 1
  30. 300 DATA 027:REM ESC
  31. 310 DATA 043:REM +
  32. 320 DATA 045:REM -
  33. 330 DATA 017:REM LINE FEED
  34. 340 DATA 013:REM ENTER
  35. 350 DATA 054:REM 6
  36. 360 DATA 057:REM 9
  37. 370 DATA 051:REM 3
  38. 380 DATA 024:REM ALT
  39. 390 DATA 048:REM 0
  40. 400 DATA 046:REM .
  41. 410 DATA 145:REM CRSR UP
  42. 420 DATA 017:REM CRSR DOWN
  43. 430 DATA 157:REM CRSR LEFT
  44. 440 DATA 029:REM CRSR RIGHT
  45. 450 DATA 025:REM NO SCROLL
  46.